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MODULE DynamicMultiSourceProxyServer; 
/* Data Structure to maintain connection states */ 
struct ConnectionState{ 



int 
URL 
NetHost 
int 

LIST OF NetHost 
LIST OF NetHost 
int 



State; /* IDLE, CONNECTING */ 
StreamSource; /* Source Identifier */ 
Parent; /* Parent Node of this Connection */ 
ChildCount; /* Number of children */ 
Children; /* Children of this Connection */ 
Waiting; /* Awaiting parent connection */ 
Load, Dist, Cons, Max, LinRate, LoffRate; 
/* Connection Management; */ 

} struct Proxy Parent{ 
URL 
NetHost 

} 

SET OF ConnectionState 

/* INITIALIZATION HERE */ 
/* Event Handling */ 

MONITOR(P) from sender S for sourceURL; 
LOGIN(params) from sender S for sourceURL: See Figure 9 
LOGOFF(params) from sender S for sourceURL: See Figure 10 
CONNECTED0 from S for sourceURL; 
ConnRefused() from S for sourceURL; 
SwitchToParent(P) from PNC for sourceURL; 



StreamSource; /* Source Identifier */ 
ParentCache; /* my parent for this source? */ 

Conns; /* global variables */ 



Figure 8 



LOGIN(params) from sender S for sourceURL: 

{ 

Let CC be in Conns such that CC.StreamSource = sourceURL; 
if there is no ConnectionState then 

* setup the structure to maintain the ConnectionState; 

• update load information appropriately; 
endif 

update CC.Load, CC.LoginRate using double smoothing; 
if (New ConnectionState) 

send(LOGIN(params+MyParams)) to CC.Parent for sourceURL; 

mark this request as WAITING for 

a connection setup with the parent Proxy; 
else if (ConnectionState indicates login requests to parent is pending) 

mark this request as WAITING for 

a connection setup with the parent Proxy; 
else /* parent connection already exists */ 

SetUpLocalConnection(params, S); /* allocate buffers etc. */ 

send(CONNECTED) to S for sourceURL; } 
update CC.Load, CC.LoginRate using double smoothing; 
if (OVERFLOW possible) 

/* check if the current load+login rate-logoff rate will cause overflow */ 
send(DISTRIBUTE(MyParams)) to ProxyNetworkCoordinator; 



Figure 9 



LOGOFF(params) from sender S for sourceURL: 

{ 

Find entry CC in Conns s.t. Entry.StreamSource=sourceURL; 
TearDownLocalConnection(params, S); /* deallocate buffers etc. */ 
Remove S from the list of children of CC; 
Conn.Children=Conn.Children\ {S}; 

update load parameters: Load, LogoffRate using double smoothing; 
if UNDERFLOW possible 

/* check if the current load+login rate-logoff rate will cause overflow */ 

send(CONSOLIDATE(MyParams)) to ProxyNetworkCoordinator 

for sourceURL; 
endifif (this is the last user to logoff) 

send(LOGOFF(params,MyParams)) to Conn. Parent for sourceURL; 

DEALLOCATE Conn; 
endif } 



Figure 10 



MODULE DynamicMultiSourcePNC: 
struct Proxy{ 

NetHost 

int 

int 

NetHost 
List of NetHost 

} 

struct SourceProxyPair{ 
NetHost 
Proxy 
INFO 



Id; 

State; /* FREE, INUSE, FAILED */ 
Tier; /* Tier Identifier */ 
Parent; 
Children; 



StreamSource; 
OverlaytNTiers][NProxies]; 
ProxyMaint[NTiers] ; 



} /* The proxies are maintained in a layered manner */ 
SET OF SourceProxyPair ProxyNet; /* Global Variables */ 
BEGIN 

/* Initialization */ 

/* Initiate Link Monitoring Activity */ 
/* Event Handling */ 

DISTRIBUTED from S for sourceURL: See Figure 12. 
CONSOLIDATEO from S for sourceURL: See Figure 14. 
END. 



Figure 1 1 



DISTRIBUTEO from S for sourceURL: 
sp <*= stability period 

SysLinRate <*= Z pe Proxie8[s.tier)LinRate p 
SysLoffRate 4= X p eProxie 8 [SMer}LoffRate p 

if ((SysLinRate - SysLoffRate) • sp) > ^2 pePr oxies[SMer]( Max P ~ Load ^ 

Loadi = ((SysLinRate - SysLoffRate) ■ sp) - £ p€ p r o*i e *[s.iierl( Max P " Load ^ 
Loa&i = SysLinRate • AT; 
AntitipatedLoad = M AX(Load u Load 2 )\ 

FIND m proxies in S.tier such that X? = i Max i ^ AnticipatedLoad and m is minimum; 
Let this set be P = {Pi, ft, ..,Pm}; 
else /* the current load can be handled by currently active proxies */ 
V = CreateS erverFarmFromActiveProxiesQ; 

ifP = 0{ 

AnticipatedLoad = SysLinRate ■ AT; 

FIND m proxies in S.tier such that E^Max* > AnticipatedLoad and m is minimum; 
Let this set be V = {Pi.ft, 

} 

for (each proxy T €V) do 
{ 

Activate T in p.Overlay; 

/*find parent; use a round robin allocation if multiple parents*/ 

P = FindCurrentActiveProxy(p.Overlay, ParentTier(T.tier)); 

/* the following steps maintains the active part of the overlay */ 

p.Overlay[P.i][Rj].Children=* U {T} ; 

p.Overlay[T.i][T.j].Parent=*U{P}; 

if (T is at the lowest level) then add T to the DNS; 

send(SwitchToParent(P)) to T for sourceURL; } 



Figure 12 



CreateServerFarm: 

for all active proxis S do{ 

find minimum MIN such that 

(( Sy8 M?N ate " Loff rates) • sp) < Max s - Load s \ 
ADD (MIN, S) to the HashTable; 

} 

5 = 0; 
count = 0; 

for (i = 0; i < n; i + +) do{ 

Let the set of proxies with hash value i be S'; 
count = count + |5'|; 
S = SUS'; 

if (count > i) RETURN 5; 

} 

RETURN {}; 

Figure 13 



CONSOLIDATE() from S for sourceURL: 
sp stability period 

SysLinRate <= ^ P eProxie8[s.tier]LinRate p 
SysLoffrate X pe p roxie8[S j ier] LoffRxite p 

if ({SysLinRate - SysLoffRate) • sp > E P eProxiesinS.TierA P ^s( Max p ~ Load p )j S is deactivated; 



Figure 14. 



